pcworld online logo

D▌SKTEK▌ BO▐ ALANI BULMAK

S▌ZE herhangi bir diskte kalan bo■ alan²n nas²l bulunaca≡²n² veremeyece≡iz; τⁿnkⁿ bu durumda Visual Basic'in her bir sⁿrⁿmⁿ iτin ayr² kodlar vermemiz gerekir. Asl²nda herhangi bir komutu bulunmayan bo■ disk alan² bulma i■lemini VB uygulamalar²n²z²n kurulumunu gerτekle■tirmek iτin kulland²≡²n²z dosyalardan biri olan SETUPKIT.DLL (VB4'te STKIT416.DLL) dosyas²n² kullanarak gerτekle■tirebilirsiniz.

Declare Function DiskSpaceFree Lib ' SETUPKIT.DLL' () As Long
sat²r²n² formlardan ba≡²ms²z bir modⁿle yazd²ktan sonra a■a≡²daki ⁿτ sat²r² kullanarak sadece VB 3.0'da geτerli olacak programc²≡²n²z² tamamlayabilirsiniz.
Dim bos_alan&
' DiskSpaceFree() fonksiyonunun d÷ndⁿrdⁿ≡ⁿ de≡eri ta■²r.
ChDrive ' c:' ' Bo■ alan² bulmadan ÷nce sⁿrⁿcⁿmⁿzⁿ seτelim.
free_space& = DiskSpaceFree()

VB'nizin sⁿrⁿmⁿ ne olursa oldun SETUPKIT dizinindeki projeyi aτarak hangi DLL dosyas²ndan yararlanaca≡²n²z² ve ne gibi kodlar yazman²z gerekti≡ini ÷≡renebilirsiniz.